home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / util / wb / sonivisgui.lha / SONIVISGUI / AUDIO_GUI next >
Text File  |  1995-05-17  |  696b  |  33 lines
  1. ;SOUND GUI file viewer V1.11
  2. ;©1995 Ivan Smith
  3. ;For WorBench 3.X+ ONLY!
  4. ;Requestchoice and Requestfile must be in you C: dir.
  5.  
  6.  
  7. LAB Start
  8. C:Requestchoice >env:SNDchoice "AUDIO""Choose*nYour Player""Play16""Play16HI FI""OmniPlay"
  9. IF $SNDchoice eq "0"
  10. skip OmniPlay
  11. ENDIF
  12. IF $SNDchoice eq "1"
  13. skip Play16
  14. ENDIF
  15. IF $SNDchoice eq "2"
  16. skip Play16HF
  17. ENDIF
  18. LAB Omniplay
  19. C:Requestfile >env:Soundfile TITLE "Which Audio File?"
  20. C:oplay $Soundfile
  21. endcli
  22. skip start
  23. LAB Play16
  24. C:Requestfile >env:Soundfile TITLE "Which Audio File?"
  25. C:play16 FILTER=OFF $Soundfile
  26. endcli
  27. skip start
  28. LAB play16HF
  29. C:Requestfile >env:Soundfile TITLE "Which Audio File?"
  30. C:Play16 FILTER=OFF HIFI $Soundfile
  31. endcli
  32. skip start
  33. ;END